home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-users-of-norman / CUON_##_(07-1985).d64 / auto line number (.txt) next >
Commodore BASIC  |  2019-04-13  |  615b  |  18 lines
  1. 1 X=49152
  2. 2 READY:IFY=-1THEN4
  3. 3 POKEX,Y:X=X+1:Z=Z+Y:GOTO2
  4. 4 IF Z<>12374THENPRINT"ERROR IN DATA STMTS":END
  5. 50 REM
  6. 60 REM- TO OPERATE "AUTO LINE NUMBER",
  7. 70 REM- "RUN" THE PROGRAM, THEN
  8. 80 REM- ENTER "SYS49152" <RETURN>.
  9. 90 REM-
  10. 100 DATA169,90,133,251,169,0,133,252,169,19,141,2,3,169,192,141,3,3,96,32,25
  11. 110 DATA192,76,134,164,24,169,10,101,251,133,251,144,2,230,252,165,251,133,99
  12. 120 DATA165,252,133,98,162,144,56,32,73,188,32,221,189,162,0,189,1,1,240,9,32
  13. 130 DATA210,255,157,0,2,232,208,242,32,18,225,201,13,240,3,76,105,165,56,165
  14. 140 DATA251,233,20,176,2,198,252,169,131,141,2,3,169,164,141,3,3,76,118,165,-1
  15. 150 POKE 251,0
  16. 155 POKE 252,0
  17. 200 NEW
  18.